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SEQ 0003 


73 The KDJ11-B8 is a PDP-11 CPU that incorporates the J1l chip set as the 
74 heart of the processor. It is a quad height Q22 bus module. The 
75 KDJ11-B has two on-board ROM’s. One of them, the 16-bit addressable 
76 ROM, contains the self-test and the boot codes. The other ROM, the 
77 8-bit addressable one, contains the bese erea with hardware selection 
78 peraemeters, optional bootstraps, optional UFD (User Friendly 
4 Diagnostic) system desctiption area, and optional foreign language 
text. 
! 


82 On units to be shipped to non-English speaking countries, a dummy or 
83 "null" language is loaded into the EEPROM. The purpose of this is to 
84 disable English language error messages when the system is first 

85 installed. If and when the system passes its internal self tests, 
86 the user will be instructed to run a UFD (User Friendly Diagnostics) 
87 package which will be part of a “country kit” for each seperate 

88 language. The UFD package will use the native language for the 

89 particular country and, in addition, will load diagnostic and error 
90 messages in the native language into the EEPROM, so each subsequent 
91 power-up or reboot will have diagnostic and error messages in the 

92 user's own language. 


94 The purpose of this program is to select the diagnostic/boot ROM 

95 messages rather than any EEPROM sgeeee area-based messages. It 

96 will delete any language in the EEPROM to free up space but will leave 
97 the UFD (user friendly diagnostics) area intact. If the program 

98 detects an error while modifying the EEPROM setup area, the program 
99 will attempt to restore the setup area to its previous state. If 

100 the program detects an error while updating the UFD area in the 

101 EEPROM, a warning message will be issued, stating that the UFD 

102 area has been corrupted. 


104 2. SYSTEM REQUIREMENTS 

106 Hardware Requirements 

108 To run successfully this utility needs: 
111 S. epeqels Sqretat 

112 E 3. at least 28K of memory 

115 3. LOADING AND STARTING PROCEDURES 
117 To start-up this program: 

119 1. Boot XXDP-+ 


121 2. Type “R NAME”, where NAME is the name of the BIN or BIC 
122 file for this program. 


124 The starting address of the program is 1000. 


69 
70 1. PROGRAM ABSTRACT 
| 125 Note: if trying to restart the program in an arbitrary place after 
' 
| 
I 
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SEQ 0004 
126 HALT on Break the following registers should be set up: 
127 17777572=0 to disable memmory management 
128 17777520=1000 to clear diagnostic mode (bit 8), but still save 
129 HALT on Break 


130 17777746=400 to flush the cache 
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SEQ 000s)! 
He 4. SPECIAL ENVIRONMENTS 
‘3s The program is not APT compatible. 
136 S. PROGRAM OPTIONS 
137 
138 None. 
139 
or 6. EXECUTION TIMES 
iat The program runs in under 10 seconds. 
‘se 7. ERROR INFORMATION 
ae 7.1 DEFECTIVE BYTE IN EEPROM 
148 After each write, the Byte which should have been written is 
149 compared to the Byte in the proper location, and if it is not correct, 
iat the following error message is displayed: 
152 EEPROM write error, PCR page n, address mmmmmm. 
oy Data written qqq, date read rrr. 
1 
155 where n is the EEPROM page selected by the Page Control Register (PCR), 
156 mmmmmm is the physical address of the bad byte in question, qaq is the 
157 byte value that was written out to the address and rrr what was read 
os back in after the write. (should be identical to qaq) 
1 
160 7.2 PROCESSOR NOT KDJ11-B 
161 
162 The program checks the type of CPU it is running on, which must be a 
163 KDJ11-B processor (MFPT returns 5 in r0). If not, the following message 
164 is printed: 
165 
166 Language area not supported by this processor. 
167 
168 7.3 CHECKSUM ERROR IN SETUP AREA 
169 
170 The checksum in the setup area is checked to see if it contains a valid 
171 checksum. Also, bytes 6 and 103 (addresses 17765022 and 17765314, 
172 respectively) are checked to see if they contain 0 and 252 octal, 
173 respectively. If any of these conditions is not met, the following 
174 message is printed: . 
175 
176 EEPROM checksum error in setup area. 
177 
Bae No attempt is made to correct a checksum error. 
1 
= 7.4 DIFFERENCES BETWEEN UFD "QUIET" MODE AND “STANDALONE” MODE 
181 
182 When this program is run in UFD “Quiet” mode (which will usually be 
183 the case) none of the error messages will appear. If no error is 
184 detected, no messages whatsoever are printed. If an error is detected 
185 when writing the setup area, the program will attempt to restore the 
186 setup erea to the state it was in when the program was started. If an 
187 error was detected when the UFD area is being moved, the following 
message is printed: 


~ 
o 
@ 
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SEQ 0006 

189 
oy WARNING: UFD area has been corrupted. 
192 8. EXAMPLES 
193 
194 After booting XXDP+ and running the program, no message should 
ios appear, just the XXDP dot prompt ( . ) 
ios If a problem occurred, one of the messages in section 7 should appear. 
hed 9. PROGRAM DESCRIPTION 
201 This program consists of a body of code which checks certain 
202 conditions such as correct processor type, clears the EEPROM one 
203 bit in the EEPROM, and frees up any language area in the EEPROM. I 
204 there was an unsuccessful attempt to write any of the bytes in the 
205 EEPROM, one of the message in section 7 appears. If run under UFD 
206 "Quiet" mode, no message is printed if the program was successful, 
207 otherwise the messages in 7.4 appear. In both cases, the XXDP prompt 
208 appears. ’ 


209 é 





{ 
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211 

212 

213 

214 000000 

215 

216 

217 

218 177520 
219 177522 
220 177522 
221 165000 
222 165316 
223 165006 
224 166000 
225 173002 
226 025370 
227 000140 
228 000040 
229 000003 
230 

231 000004 
232 

233 177524 
234 000015 
235 000012 
236 000200 
237 000100 
238 000011 
239 000010 
240 000040 
241 000033 
242 

243 

254 


‘- CS LL LLL LL A LED LLL LLL LLL 


Wednesday 


. TITLE 


H1 
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aaa CONSTANTS 
MD ,CND 
ME 


177520 
177522 
177522 
165000 
E2PROM+316 
E2PROM+6 
E2PROM+1000 
173002 


SEQ 0007 


;E2PROM PARITY BYTE 

sLOCAL LANGUAGE BIT IN E2PROM 
sLAST ADDRESS OF E2PROM+2 

;WORD TO TEST ROM VERSION NUMBER 


31.0. OF A LANGUAGE AREA 

;1.0. OF A UFD BLOCK 

sNUMBER OF ATTEMPTS TO WRITE A 
s;BYTE IN E2PROM BEFORE GIVING UP 
sNO. OF ERRORS ALLOWED IN LOCAL 
sLANGUAGE TEXT BEFORE QUITTING 





| 
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SEQ coos =! 
CHECK FOR CERTAIN EXCEPTIONS FIRST 
287 .SBTTL CHECK FOR CERTAIN EXCEPTIONS FIRST 
289 001000 .=1000 
291 001000 005037 177522 START: CLR aePCR ;SELECT PAGE 0 OF EEPROM 
292 001004 013746 177520 MOV @eBCSR,-(SP) | ;SAVE OLD BCSR VALUE 
298 001010 112737 000060 177520 MOVB #60, aBCSR ;WRITE ENABLE THE E2PROM & ENABLE ROM 
295 001016 000007 MEPT ;GET PROCESSOR TYPE 
296 001020 020027 000005 CMP RO, #5 ;CHECK TO SEE IF ORION 
297 001024 001404 BEQ 1$ ;YES - CONTINUE 
298 001026 -TYPMSG #FMSG2 ;FIELD-SERVICE MESSAGE 
000001 "NARG NARGS 
000027 "NTYPE NTYPE, #FMSG2 
001026 012700 002215 MOV #FMSG2,RO 
001032 104003 EMT 3 
299 001034 000426 BR 203$ 
301 001036 012700 165000 1$: MOV #E2PROM,RO ;STARTING ADDRESS TO CHECKSUM 
302 001042 005001 CLR R1 ; INITIALIZE CHECKSUM 
303 001044 012703 000151 MOV #105. ,R3 ;NO. OF BYTES TO CKSUM 
304 001050 012005 201$: MOV (RO)+.R5 ;GET A BYTE 
305 001052 042705 177400 BIC $177400,R5 ;NO BUS NOISE, THANK YOU. 
306 001056 060501 ADD R5,R1 ; ACCUMULATE CHECKSUM 
307 001060 077305 SOB R3,201$ ;CONTINUE TILL DONE 
308 001062 105701 TSTB RL ;1S CKSUM 0? 
309 001064 001007 BNE 202$ ;NO, ERROR 
310 001066 105737 165022 TSTB  a#E2PROM+22 ;BYTE TO TEST FOR VALID ROM, SHOULD BE 0 
311 001072 001004 BNE 202$ ;NO, ERROR 
312 001074 123727 165314 090252 CMPB aE2PROM+314, #252 ;BYTE TO TEST FOR VALID ROM 
313 001102 001404 BEQ USETUP ;GO TO NEXT CHECK IF OK 
314 001104 202$:  .TYPMSG #FMSG4 ;FIELD SERVICE MESSAGE 
000001 "NARG NARGS 
000027 "NTYPE NTYPE, @FMSG4 
001104 012700 002350 MOV #FMSG4,RO 
001110 104003 EMT 3 
315 001112 000573 203$: BR EXIT ;QUIT 
316 
3)7 .SBTTL CLEAR LANGUAGE BIT AND UPDATE CKSUM 
318 
319 001114 012700 165006 USETUP: MOV #E2LLB,RO ;ADDRESS OF LANG. BIT 
320 001120 111005 MOVB = (RO), RS ;GET BYTE WHERE LANGUAGE BIT EXISTS 
321 001122 002032 BGE LANG ;IF ALREADY CLEAR, NO UPDATING IS NECESSARY 
322 001124 042705 000200 BIC #BIT7,RS ;CLEAR LANGUAGE BIT 
323 001130 004767 000460 CALL /WRBYTE ;WRITE IT BACK 
324 001134 001405 BEQ 1$ ;WRITE WENT OK 
325 001136 052705 000200 BIS #B1T7,RS ;PUT THINGS BACK THE WAY WE FOUND THEM 
326 001142 004767 000446 CALL  WRBYTE ; 
327 001146 000555 BR EXIT ;GIVE UP 
328 001150 012700 165316 1s: MOV #E2PAR,RO ;ADDRESS OF PARITY BYTE 
329 001154 111005 MOVB = (RO), RS ;GET PARITY BYTE 
330 001156 162705 000200 SUB #BIT7,RS ;UPDATE PARITY 
331 001162 004767 000426 CALL _WRBYTE ;WRITE IT BACK 
332 001166 001410 BEQ LANG ;IF ALL WENT WELL 
333 001170 062705 000200 ADD #B1T7,RS ;TRY TO PUT EVERYTHING BACK 
334 001174 004767 000414 CALL _WRBYTE ;THE WAY WE FOUND IT 
152737 000200 165006 BISB @BIT7,@#E2LLB  ;RESTORE LANGUAGE BIT 


8 
S 


' 
ae a 











COEEHA EEPROM USENG LANG LOR 
UPDATE CKSUM 


CLEAR LANGUAGE 
336 001206 


340 001210 
341 001214 
342 001222 


wl 
wo 
Lt) 
s 
= 
yy 
ee 
°o 


BIT AND 
000535 


012700 
112737 
012701 
010005 
005003 
111004 
060403 
005740 
077104 
105793 
001116 


014504 
014546 
110466 
042704 
012601 
042701 
062701 
120427 
001100 


010146 
062701 
004767 
005003 
004767 
004767 
004767 
010546 
004767 
110566 
004767 
116600 
012601 
105703 
001005 


042700 
120027 
001413 


005726 
112737 
012700 
112705 


165776 
000016 
000005 


000001 
177437 


160000 
000005 
000140 


000005 
000460 


000424 
000420 
000414 


000406 
000001 
000376 
000001 


177437 
000040 


000016 
165774 
000377 
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LANG 
177522 


4$: 


EXIT 


CHECK FOR LANGUAGE 


#ENDE2R-2,RO 


#16 ,39#PCRLB 


-C(R5),R4 


-CRS),-CSP) 


R4,1(SP) 
#177437 ,R4 
(SP)+,R1 
#160000,R1 


s;LAST ADDRESS (CKSUM) OF E2PROM 
sSELECT LAST PAGE 

3NO. OF BYTES IN HEADER TO CHECKSUM 
;SAVE ADDRESS 


é 

;GET A BYTE 

sACCUMULATE CHECKSUM 

sCORRECT ADDRESS 

;LOOP FOR 5S BYTES 

;IF NOT ZERO, NO LANGUAGE LOADED 
sNON-EXISTANT OR CORRUPTED LANGUAGE - SKIP 


sHIGH BYTE OF BYTE COUNT 

;LOW BYTE OF BYTE COUNT 

;SET UPPER BYTES OF SIZE 

sEXTRACT ID CODE 

;GET SIZE BACK 

sR1 NOW CONTAINS SIZE OF BLOCK IN BYTES 
;ADD BYTE COUNT FOR HEADER BLOCK 

;IS THIS A LANGUAGE HEADER? 

sNO - QUIT 


;IF LAST BLOCK IS NOT LANGUAGE IT IS EITHER A UFD BLOCK OR UNUSED. IF IT IS 


;UFD, IT IS IN CORRECT POSITION. 


sNO ACTION IS NECESSARY. 


R1,-CSP) 
#5,R1 
ROMADR 
R3 


REAROM 
REAROM 
REAROM 
RS, -CSP) 
REAROM 
RS,1(0SP) 
REAROM 
1(SP),RO 
(SP)+,R1 
R3 

i$ 


#177437,RO 
— 
2 


IF UNUSED, IT CAN BE IGNORED. IN EITHER CASE, 


sSAVE SIZE FOR NOW 

sADD SIZE OF (POSSIBLE) UFD HEADER 
;SET UP PCR AND RO 

sINITIALIZE CKSUM 

;GET A BYTE 

;GET A BYTE 

;GET A BYTE 

sSAVE LOW BYTE OF SIZE FOR LATER 
;GET A BYTE 

s;SAVE HIGH BYTE OF SIZE AND ID 
;GET A BYTE 

;GET I.0. 

sGET SIZE 

;SEE IF VALID CKSUM 

sNO - WE HAVE LANGUAGE ONLY. 


;GET ID ONLY 
:IS THIS A UFD BLOCK? 
s;YES, CONTINUE. 


;IF WE GET HERE, WE HAVE A LANGUAGE ONLY AND NO UFD. WE CLOBBER 
; THE LANGUAGE TO MAKE ROOM FOR EEPROM BOOTS, ETC. 


177522 


TST 
MOVB 
MOV 
MOVB 


(SP )-+ 


#16, 2#PCRLB 


#165774,RO 
#377,R5 





sCORRECT STACK 

sSELECT LAST PAGE 
sADDRESS OF LANGUAGE I.D. 
;BAD I.D. 





SEQ 0009 


——- a 
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SEQ 0010 
CHECK FOR LANGUAGE 
393 001414 004767 000174 CALL WRBYTE ;GO CLOBBER LANGUAGE AREA TO FREE SPACE 
44 001420 000430 BR EXIT 
aor s;WE HAVE BOTH A LANGUAGE AREA AND A UFD BLOCK. SAVE THE UFD BLOCK. 
398 001422 042701 160000 2s: BIC #160000 ,R1 ;GET RID OF ID 
399 001426 062701 000005 ADD #5,R1 sSIZE OF HEADER 
400 001432 010104 MOV R1,R4 s;BYTE COUNT TO MOVE 
401 001434 010167 000420 MOV R1,UFDSIZ sSAVE UFD SIZE 
402 001440 062601 ADD CSP)+,R1 sADD SIZE OF LANGUAGE AREA 
403 001442 012702 002417 MOV @BUFF ,R2 sMEMORY ADDRESS TO SAVE TO 
404 001446 004767 000114 CALL MOVROM sSAVE UFD AREA 
roe 001452 001013 BNE EXIT ;IT IS BAD, QUIT. 
aos s;WRITE UFD BLOCK 
409 001454 016701 000400 MOV UFOSIZ,R1 sGET THE LENGTH OF THE UFD 
410 001460 001410 BEQ EXIT sNO UFD AREA - SKIP 
411 001462 004767 000306 JSR PC ,ROMADR sCOMPUTE E2PROM PAGE AND ADDR 
412 001466 012702 002417 MOV @BUFF ,R2 sADDRESS OF BEGINNING OF UFD AREA 
413 001472 112205 35$: MOVB C(R2)+,RS sGET SOME DATA 
414 001474 004767 000020 CALL E2WRIT :GO WRITE IT 
415 001500 077104 SOB R1,35$ sFINISHED UFD? 
ry ;YES-EXIT 
1 
418 001502 142716 000060 EXIT:  BICB #60, (SP) ;BE SURE ROM IS DISABLED 
419 001506 012637 177520 MOV (SP)+,@#BCSR sRESTORE BCSR 
420 001512 005037 177522 CLR aePCR : 
rr} 001516 000207 RTS PC 
423 001520 004767 000070 E2WRIT: CALL WRBYTE ;WRITE THE BYTE TO E2PROM 
424 001524 001405 BEQ 3$ ;OK THIS TIME 
425 001526 -FRCTYP #FMSG3 sWARN USER OF CORRUPTED UFD AREA 
000001 -NARG NARGS 
000027 -NTYPE NTYPE,#FMSG3 
001526 012700 002276 MOV #FMSG3,RO 
001532 104044 EMT 44 
426 001534 005726 TST (SP )+ sCORRECT STACK 
427 001536 000761 BR EXIT sQUIT 
428 
429 001540 062700 000002 3$: ADD #2 ,RO s INCREMENT LOCATION 
430 001544 020027 166000 CMP RO, #ENDE2QR sFINISHED THIS PAGE ? 
431 001550 001005 BNE 10$ sNO-RETURN 
432 001552 012700 165000 MOV #E2PROM,RO ;YES-RESET ADDRESS 
433 001556 062737 000002 177522 ADD #2,30PCR sINCREMENT PCR TO NEXT PAGE 
ren 001564 000207 10$: RETURN 
a 
— -SBTTL PROGRAM SUBROUTINES 
4 
438 sMOVROM - MOVE BYTES FROM EEPROM TO MEMORY 
439 sENTRY- R1 = STARTING ADDRESS IN EEPROM (# OF BYTES FROM END) 
440 : R2 = ADDRESS OF MEMORY BUFFER 
441 ; R4 = # OF BYTES TO MOVE 
442 sEXIT R1 - UNCHANGED 
443 ; R2 - UPDATED MEMORY ADDRESS 
aaa ; R3 = (BYTE) O IF VALID CKSUM 
445 ; "Z" FLAG SET IF CKSUM VALID 


ce ee 





fo ae Ne et 
) Li 
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001732 104030 EMT 30 
480 001734 -TYPMSG #FMSG1D ;PRINT LOWER 3 BYTES & REST OF MESSAGE 


SEQ 0011 
PROGRAM SUBROUTINES 
446 
447 001566 010403 MOVROM: MOV R4,R3 sSAVE R4 
448 001570 004767 000200 CALL ROMADR ;LOAD PCR AND RO WITH LANGUAGE START AREA 
449 001574 010304 MOV R3,R4 sRESTORE BYTE COUNT 
450 001576 005003 CLR R3 sINIT CHECKSUM 
451 001600 004767 000142 S$: CALL REAROM ;GET A BYTE 
452 001604 110522 MOVB RS,CR2)+ sSAVE IT 
453 001606 077404 SOB R4,5$ s;LOOP TILL DONE 
454 001610 105703 TSTB R3 31S CHECKSUM GOOD? 
ri 001612 000207 RETURN 
457 001614 120510 WRBYTE: CMPB RS, CRO) ;IS THE NEW DATA DIFFERENT ? 
pt 001616 001452 BEQ 10$ sNO-DO NOT WRITE OVER 
460 001620 012703 000003 MOV @RETRY ,R3 
461 001624 010510 1$: MOV RS, CRO) sWRITE A LOCATION 
462 001626 012704 025370 MOV @DELAY ,R4 311 MS WAIT 
463 001632 077401 SOB R4,. sWASTE TIME 
464 001634 120510 CMPB RS, CRO) sSEE IF IT TOOK 
465 001636 001442 BEQ 10$ sYES, ALL OKAY 
466 001640 077307 SOB R3,1$ sIF AT FIRST YOU DON'T SUCCEED... 
467 001642 113704 177522 MOVB a@ePCRLB,R4 sPCR PAGE OF BAD BYTE 
468 001646 106204 ASRB R4 sCONVERT TO PAGE @ 
469 001650 062704 000060 ADD #'O,R4 sCONVERT TO OCTAL 
470 001654 110467 000237 MOVB R4,FMSG1A sSTORE IT FOR PRINTING 
471 001660 010046 MOV RO, -(SP) sSAVE ROM ADDRESS 
472 001662 -ITOA ,@FMSG1B sCONVERT ROM ADDRESS TO OCTAL 
000002 -NARG _NARGS 
000027 -NTYPE NTYPE , #FMSG1B 
001662 012701 002132 MOV #FMSG1B,R1 
001666 104030 EMT 30 
473 001670 .TYPMSG @FMSG1 sPRINT OUT FIRST PART OF MESSAGE 
000001 -NARG NARGS 
000027 -NTYPE NTYPE,#FMSG1 
001670 012700 002062 MOV #FMSG1,RO 
001674 104003 EMT 3 
474 001676 042705 177400 BIC #177400,R5 sMAKE SURE RS IS POSITIVE AND A BYTE 
475 001702 -ITOA RS, #DUMMY1 sCONVERT TO OCTAL 
000002 -NARG _NARGS 
000005 -NTYPE NTYPE ,RS 
001702 010500 MOV R5,RO 
000027 .NTYPE NTYPE , @DUMMY1 
001704 012701 002160 MOV #@DUMMY1,R1 
001710 104030 EMT 30 
476 001712 .TYPMSG @FMSG1iC sPRINT OUT LAST 3 DIGITS OF NUMBER & MESSAGE 
000001 -NARG NARGS 
000027 -NTYPE NTYPE,#FMSG1C 
001712 012700 002163 MOV #FMSG1C,RO 
001716 104003 EMT 3 
477 001720 013600 MOV @CSP)+,RO ;GET BYTE AT ROM ADDRESS 
478 001722 042700 177400 BIC #177400,RO ;GET RID OF BUS NOISE 
479 001726 -ITOA ,#DUMMY2 sCONVERT TO OCTAL 
000002 -NARG _NARGS 
000027 -NTYPE NTYPE , @DUMMY2 
001726 012701 002203 MOV #DUMMY2,R1 
} 
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001734 
001740 
481 001742 
482 001744 


494 001746 
495 001750 
496 001752 
497 001756 
498 001760 
499 001764 
500 001772 


te 


000000 
177777 
000000 


002206 


166000 


165000 
000002 


177770 
000010 


177400 


165000 


177000 
165000 


177522 
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10$: 


;REAROM 
;PCRLB. 
3 


i 

F 

3 

F 

3 

F 
REAROM: 

177522 

10$: 
;ROMADR 
3 

3 

; 

: 


ROMADR : 


20$: 


30$: 


WERR: 
OLOSIZ: 


UFDSIZ: 


Mi 


NARGS 
NTYPE , @FMSG1D 
ve 


ool 


SEQ 0012 


sCOULON’T DO IT, SET ERROR FLAG 


- READS A BYTE FROM E2PROM ADDRESS (RO)+ INTO RS. AUTOMATICLY ADJUSTS 
UPDATES CKSUM IN R3 


ENTRY - RO ADDRESS 
R3 PARTIAL CKSUM 
PCRLB CORRECT VALUE FOR BYTE TO READ 
EXIT RO ADDRESS OF NEXT BYTE 
R3 UPDATED CKSUM 
BYTE READ 


RS 
PCRLB CORRECT 


ADD RS,R3 

CMP RO, #ENDE2R 

BNE 10$ 

MOV #E2PROM,RO 

ADD #2 ,30PCR 

RETURN 

- CALCULATE PAGE OFFSET 

ENTRY - R1 SIZE IN 

EXIT - RO INITIAL 
Ri SIZE IN 
PCRLB CORRECT 

MOV R1,RO 

MOV R1,R5 

ASH #-8.,R5 

MOV $7+1,R4 

SUB RS,R4 

BIC #177400,RO 

ASL RO 

BNE 20$ 

MOV #E2PROM, rO 

BR 30$ 

NEG RO 

BIC #177000,RO 

BIS #E2PROM,RO 

DEC R4 

ASL R4 

MOVB R4,a0PCRLB 

RTS PC 

0 

-1 

19) 


VALUE FOR NEXT BYTE 


sGET A BYTE & UPDATE ADDR. BY 2 
sUPDATE CKSUM 
;SEE IF WE SHOULD SWITCH PAGES 


;NO 
;YES - GO TO START OF PAGE 
sADVANCE A PAGE 


ee OF ROM GIVEN SIZE IN BYTES 
ADDRESS FOR FIRST BYTE IN ROM 

BYTES 

VALUE FOR FIRST BYTE IN ROM 


;COPY BYTE COUNT 

sSECOND COPY 

sDIVIDE BYTE COUNT BY 256. BYTE PAGES 
sLAST PAGE IN 2 K PART + 1 

sSTARTING PAGE NUMBER 


sLEAVE ONLY BITS 7:0 
sDOUBLE VALUE 


H 
;IF O 
sMAKE STARTING ADDRESS BITS 8:0 


; 
sMAKE A E2PROM ADDRESS 
sDECREMENT PAGE NUMBER BY 1 


sMAKE PAGE NUMBER CORRECT FOR PCR 
sCORRECT PAGE IN PCRLB 
RETURN 


sFLAG FOR BAD BYTE 
320 - SIZE IN BYTES OF OLD LANGUAGE, O IF NO 
sLANGUAGE, -1 IF E2PROM MAY BE BAD/NONEXISTANT 


IN ROM TO READ FROM 
sSIZE IN BYTES OF OLD UFD AREA 
} 








oe 


| COEEHA EEPROM USENG LANG LOR 
PROGRAM SUBROUTINES 


540 
541 


542 


550 








- SBTTL 
-ENABL LC 
FMSG1: .ASCII 
FMSGIA: .ASCII 
FMSGiB: .BLKB 
-ASCIZ 
DUMMY1: .BLKB 
FMSG1C: .BLKB 
-ASCIZ 
DUMMY2: .BLKB 
FMSG1D0: .BLKB 
-ASCII 
CRLF : -ASCIZ 
FMSG2: .ASCIZ 
FMSG3: .ASCIZ 


Cs ee eee 
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SEQ 0013 


“FIELD SERVICE MODE” ERROR MESSAGES 


ZEEPROM write error, PCR page / 


/X, address / 


6 ;FOR ADDRESS 
<CR><LF>/Date written / 


: 33 UPPER BYTES NOT TO BE PRINTED 
/, Data read / 

: 33 UPPER BYTES NOT TO BE PRINTED 
OF 

<CR><LF> 


/Lenguage Area not supported on this processor ./<CR><LF> 


<CR><LF>/WARNING: UFD area has been corrupted. /<CR><LF> 





Be 


COEEHA EEPROM USENG LANG LOR MACRO YOS.02 Wednesday 20-Feb-85 16:23 Page 6-6 
“FIELD SERVICE MODE” ERROR MESSAGES 


SEQ 0014 


000 
551 002350 103 150 145 FMSG4: .ASCIZ /Checksum error in EEPROM setup area./<CR><LF> 


002403 164 165 160 
002406 040 141 162 
002411 145 141 0S6 
002414 015 012 000 
S52 002417 BUFF : ; TEMPORARY SAVE AREA FOR OLD AREA 


553 001000 -END START 


a a ———— U 


Ce 
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SEQ 0015 

Symbol teble 

BACKSP= 000010 DUMMY2 002203 FMSGiB 002132 MOVROM 001566 ROMADR 001774 
BCSR = 177520 ENDE2R= 166000 FMSGiC 002163 NARGS = 000001 SPACE = 000040 
BDR = 177524 ESC = 000033 FMSG1D 002206 NTYPE = 000027 START 001000 
BIT6 = 000100 EXIT 001502 FMSG2 002215 OLOSIZ 002056 TAB = 000011 
BIT7 = 000200 E2LLB = 165006 FMSG3 002276 PCR #= 177522 UFDHDR= 000040 
BUFF 002417 E2PAR = 165316 FMSG4 002350 PCRLB = 177522 UFDSIZ 002060 
CR = 9000015 E2PROM= 165000 LANG 001210 REAROM 001746 USETUP 001114 
CRLF 002212 E2WRIT 001520 LF = 000012 RETRY = 000003 WERR 002054 
DELAY = 025370 FMSG1 002062 LNGHDR= 000140 RMVTST= 173002 WRBYTE 001614 
DUMMY1 002160 FMSGIA 002117 MAXERR= 000004 


- ABS. 002417 000 CRW,I,GBL,ABS,OVR) 
000000 001 CRW,1I,LCL,REL,CON) 
Errors detected: 0 


*e* Assembler statistics 


Work file reads: 0 

Work file writes: 0 

Size of work file: 8503 Words ( 34 Pages) 
Size of core pool: 19402 Words ( 74 Pages) 
Operating system: RSX-11M/PLUS (Under VAX/VMS) 


Elapsed time: 00:00:35.75 
OEEHAO.BIC, COEEHAO/CR=COEEHAO 


ee a 


De 


COEEHAO CREATED BY MACRO ON 20-FEB-85 AT 16:23 PAGE 1 


SYMBOL CROSS REFERENCE CREF v02 

SYMBOL VALUE REFERENCES 

BACKSP = 000010 #5-239 

BCSR = 177520 #5-218 6-292 *6-293 *6-419 

BOR = 177524 5-233 

BIT6 = 000100 05-237 

BIT? = 000200 05-236 6-322 6-325 6-330 6-333 

BUFF 002417 6-403 6-412 #6-S52 

CR = 900015 @5-234 6-541 6-548 6-549 6-550 

CRLF 002212 %6-548 

DELAY = 025370 @5-226 6-462 

DUMMY 1 002160 6-475 6-475 6-542 

DUMMY2 002203 6-479 6-479 #6-545 

ENDE2R = 166000 @5-224 6-340 6-430 6-496 

ESC = 000033 @5-241 

EXIT 001502 raat 6-327 6-336 6-350 6-360 

E2LL68 = 165006 #5-223 6-319 *6-335 

E2PAR = 165316 #5-222 6-328 

E2PROM = 165000 #5-221 5-222 5-223 5-224 6-301 
6-518 6-S23 

E2WRIT 001520 6-414 96-423 

FMSG1 002062 6-473 6-473 #6-538 

FMSG1A 002117 *6-470 %6-539 

FMSG1B 002132 6-472 6-472 #6 -540 

FMSG1C 002163 6-476 6-476 06-543 

FMSG1D 002206 6-480 6-480 6-546 

FMSG2 002215 6-298 6-298 #6-549 

FMSG3 002276 6-425 6-425 #6-550 

FMSG4 002350 6-314 6-314 #6-551 

LANG 001210 6-321 6-332 #6-340 

LF = 000012 #5-235 6-541 6-548 6-549 6-550 

LNGHDR = 000140 #5-227 6-359 

MAXERR = 000004 #5-231 

MOVROM 001566 6-404 %6-447 

NARGS = 000001 6-298 6-298 06-314 6-314 #6-425 
#6-473 6-473 06-475 6-475 6-475 
6-479 #6-480 6-480 

NTYPE =» 000027 #6-298 6-298 #6-314 6-314 %6-425 
6-473 06-475 6-475 06-475 6-475 
#6-480 6-480 

OLDSIZ 002056 #6-S31 

PCR = 177522 #5-219 *6-291 *6-420 *6-433 *6-499 

PCRLB- = 177522 #5-220 *6-341 *6-390 6-467 *6-527 

REAROM 001746 6-370 6-371 6-372 6-374 6-376 

RETRY = 000003 #5-229 6-460 

RMVTST = 173002 #5-225 

ROMADR 001774 6-368 6-411 6-448 #6-509 

SPACE = 000040 #5-240 

START 001000 #6-291 6-553 

TAB = 000011 #5-238 

UFDHDR = 000040 #5-228 6-383 

UF OSIZ 002060 *6-401 6-409 #6-533 


USETUP 001114 6-313 #6-319 


6-335 
6-550 


6-394 


6-310 


6-S50 


6-425 
%6-476 


6-425 
96-476 


6-451 


6-551 


6-405 


6-312 


6-551 


#6-472 
6-476 


#6-472 
6-476 


#6-494 


SEQ 0016 


6-410 #6-418 
6-432 6-498 
6-472 6-472 
#6-479 6-479 
6-472 96-473 
#6-479 6-479 


ca A 


COEEHAO CREATED BY MACRO ON 20-FEB-85 AT 16:23 


SYMBOL CROSS REFERENCE 


SYMBOL VALUE REFERENCES 
WERR 002054 6-530 
WRBYTE 001614 6-323 6-326 6-331 


PAGE 2 


CREF 


6-334 


voe 


E2 


6-393 


6-423 


#6-457 


SEQ 0017 


MACRO NAME REFERENCES 


-FRCTY @5-276 6-425 
-ITOA #5-255 6-472 6-475 6-479 


COEEHAO CREATED BY MACRO ON 20-FEB-85 AT 16:23 PAGE 3 
SEQ 0018 
MACRO CROSS REFERENCE CREF v02 
. TYPMS 05-244 6-298 6-314 6-473 6-476 6-480 

| 

\ 


> OO EEE EE ES LT 


